home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
edit
/
vedt.zip
/
DEMO5.VDM
< prev
next >
Wrap
Text File
|
1990-02-10
|
4KB
|
186 lines
!D-WINDOW!
RI(9)/VEDIT and VEDIT PLUS - Windows/
M(H) !Display header
YT/
VEDIT and VEDIT PLUS can display windows in many different configurations.
Vertical windows, horizontal windows, big windows and small windows. On color
systems the window background and the text can be in color. The user has
control over window size, position and color.
First we will demonstrate some window possibilities. Then you can create your
own windows.
/
M(K)
YWB($) 1
YWR(1) 40
YWS($)
YT/Vertical windows. Press <ESC> to continue/
XK(0)//
YWI
YWB($) 1
YWB(1) (.sl/2-1)
YWS($)
YT/Horizontal windows. Press <ESC> to continue/
XK(0)//
YWI
YWB($) 1
YWB(1) (.sl/2-1)
YWR(2) 40
YWS(1)
YWR(3) 40
YWS($)
YT/Four windows. Press <ESC> to continue/
XK(0)//
YWI
YWB($) 1
YWR(1) 52
YWB(2) (.sl/2+4)
YWS(1)
YWB(3) 10
YWS(3)
YWR(4) 25
YWS(4)
YWB(5) (.wl/2-2)
YWS($)
YT/Irregular shaped windows. Press <ESC> to continue/
XK(0)//
YWS(@)
Q21YEA YEC
YWS(1)
Q24YEA YEC
YWS(2)
36YEA YEC
YWS(3)
80YEA YEC
YWS(4)
Q25YEA YEC
YWS(5)
97YEA YEC
YWS($)
Q23YEA YEC
YT/Colored windows. Press <ESC> to continue/
XK(0)//
RI(8)/You have complete control
over the color of each
window and the color of
the text in the window.
/
YWS(@)
RT(8) YT/This is white on blue/
YWS(1)
RT(8) YT/This is green on red/
YWS(2)
RT(8) YT/This is red on green/
YWS(3)
RT(8) YT/This is black on magenta/
YWS(4)
RT(8) YT/This is blue on cyan/
YWS(5)
RT(8) YT/This is blue on brown/
YWS($)
Q23YEA YEC
YT/Colored windows. Press <ESC> to continue/
XK(0)//
YWI YWB(1) 7 !Init windows, create lower text window
7XS(1) !Start with white text
0XS(2) !Start with black window
EZY !Clear out main edit buffer
RG(8) B !Copy text into edit buffer
EE(1)
B#K
I/Create your own colored window now.
Press <SPACE BAR> to change window color
Press <Enter> to change text color
--- Press <ESC> to continue ---/
B -V !Display instructions
EE(@)
[ !Loop "forever" or until <ESC> pressed
YWS(@) !Switch to visual mode window for attribute switch
(Q1^Q2)YEA !Switch attribute
YWS($)
-V !Display visual mode window
XK(0)// !Get and decode user's key
(Q0 = 32) [ 16XA(2) (Q2 & 127)XS(2)
][
(Q0 = 13) [ 1XA(1) (Q1 & 15)XS(1)
][
(Q0 = 27) JL !Jump out of loop
]]
] !End of loop
YWS(@) Q26YEA !Set attribute in edit window
YWS(1) Q27YEA !Set attribute in lower window "1"
EE(1)
B#K
I/To create your own windows press <ALT-W> for the "Window" sub-menu. Then
press "C" to create a window. You can create a window at the Top, Bottom,
Right or Left of the current window. Press "R" for "Right". Next you give
the window a single character name. Press "2". Last, you specify the size
of the window. Type "35" and <Enter> to specify a window of 35 columns.
--- Press <ESC> to continue ---/
B -V
EE(@)
V
EE(1)
B#K
I/The built-in keystroke macro <ALT-R> lets you change the text color in the
current window. Pressing <ALT-R> toggles through 14 color combinations
including white on blue, white on black and black on white. Try it now.
<ALT-R> makes it easy to switch colors at any time and to have different
colors in different windows. The installation lets you select the initial
color combination. --- Press <ESC> to continue ---/
B -V
EE(@)
V
YWI !Clear screen
B#K !Clear edit buffer
YT\
--- EGA 43 / VGA 50 LINE SUPPORT ---
If you are using an EGA adapter, you can switch between 25 and 43 line modes
within VEDIT. (With a VGA you can switch between 25 and 50 line modes.)
Simply press <ALT-L> within Visual Mode.
If you have an EGA/VGA you can press <ALT-L> now and the Window portion of
this demo will be repeated.
--- Otherwise, press <ESC> to return to the Main Menu --- \
!D-WIN2!
XK(0)// !Get user's keystroke
(q0 = 27)JM
(q0 = 166)[(.si >= 4)[(.sl=25)[ 43YEM ][ 25YEM ] -V JP/D-WINDOW/
][ YEN YT/This is not an EGA or VGA/ YEN ]
]
JP/D-WIN2/